<?php
 If (!IsSet ($reentrance))
  {
   Session_Start () ;
   $_SESSION ["repertoire_config"] = "../../include" ;
   Include ("../../include/garennes.cfg") ;
   Include ("../../include/init.php") ;
   Include ("../include/config.inc") ;
   verif_droits ($droit_courant, $_SESSION ["code"]) ;
  }
 
 Include ("../../include/liste_diffusion.php") ;
 Include ("../../include/var_temp.inc") ;
 $action = var_courante ("action", 0, 0) ;
 
 $ok = SQL_commande ("ALTER TABLE `messages_recepteurs` CHANGE `recepteur_type` `recepteur_type` INT(11) NOT NULL DEFAULT '0',CHANGE `recepteur_groupe` `recepteur_groupe` INT(11) NOT NULL DEFAULT '0',CHANGE `recepteur_utilisateur` `recepteur_utilisateur` INT(11) NOT NULL DEFAULT '0'", $id_sql) ;
 $messagerie = restaure_configuration_defaut ("SYSTEME_PARAM","GENERAL","MEL_TYPE_MESSAGERIE",1) ;
 $millesime = millesime (0) ;
 
 If (IsSet ($action) And ($action > 0))
  {
   $texte = var_courante ("texte", 0, "") ;
   $titre = var_courante ("titre", 0, "Pas de titre.") ;
   $annee_debut = var_courante ("annee_debut", 0, Date ("Y")) ;
   $mois_debut = var_courante ("mois_debut", 0, Date ("m")) ;
   $jour_debut = var_courante ("jour_debut", 0, Date ("d")) ;
   $annee_fin = var_courante ("annee_fin", 0, Date ("Y")) ;
   $mois_fin = var_courante ("mois_fin", 0, Date ("m")) ;
   $jour_fin = var_courante ("jour_fin", 0, Date ("d")) ;
   $emetteur_type = var_courante ("emetteur_type", 0, 0) ;
   $emetteur_utilisateur = var_courante ("emetteur_utilisateur", 0, 0) ;
   $nbr_recepteur_type = var_courante ("nbr_recepteur_type", 0, 0) ;
   $recepteur_groupe = var_courante ("recepteur_groupe", 0, 0) ;
   $recepteur_utilisateur = var_courante ("recepteur_utilisateur", 0, 0) ;
   $test = $texte ;
   $tempo = "" ;
   While ($f = StrPos ($test, "/images/themes/fckeditor/"))
    {
     $d = StrPos ($test, "src=") ;
     $t = SubStr ($test, $d, $f-$d+25) ;
     //echo "->(".$d."-".$f.")".$t."<-" ;
     $tempo .= SubStr ($test, 0, $d+6)."../..".SubStr ($test, $f, 25) ;
     $test = SubStr ($test, $f+25, StrLen ($test)-$f-25) ;
     //echo $test."<BR>" ;
    }
   $tempo .= SubStr ($test, 0, StrLen ($test)) ;
   $texte = Str_Replace ("'", "\\'", $tempo) ;
   $titre = Str_Replace ("'", "\\'", filtrage ($titre)) ;
   
   Function table_adresses ($t, $id, $adr)
    {
     $ok = 0 ;
     $i = 1 ;
     While (($i <= $t [0][0]) And ($ok == 0))
      {
       If ($t [$i][1] == $adr) { $ok = 1 ; }
       $i++ ;
      }
     If ($ok == 0)
      {
       $t [0][0]++ ;
       $t [$t [0][0]][0] = $id ;
       $t [$t [0][0]][1] = $adr ;
      }
     Return $t ;
    }

   //echo $texte."<BR>" ;
   /*
   * recepteur_type : -1=Liste de diffusion
   *                  -2=Enseignant
   *                  >0=id_type_groupe_utilisateur
   * recepteur_groupe : id_groupe
   * recepteur_utilisateur : id_utilisateur
   */
   Switch ($action)
    {
     // Nouvelle composition
     Case 1 : $date_debut = $annee_debut."-".$mois_debut."-".$jour_debut ;
              $date_fin = $annee_fin."-".$mois_fin."-".$jour_fin ;
              $ok = SQL_commande ("INSERT INTO messages (id_message,titre,date_message,date_debut,date_fin,contenu,emetteur_type,emetteur_utilisateur)
                                   VALUES ('','".filtrage ($titre)."','".Date ("Y-m-d")."','".$date_debut."','".$date_fin."','".filtrage ($texte)."','".$emetteur_type."','".$emetteur_utilisateur."')",$id_sql) ;
              $res = SQL_commande ("SELECT id_message FROM messages WHERE titre='".$titre."' AND date_debut='".$date_debut."' AND date_fin='".$date_fin."'
                                       AND emetteur_type='".$emetteur_type."' AND emetteur_utilisateur='".$emetteur_utilisateur."' LIMIT 1", $id_sql) ;
              If (SQL_nbr_lignes ($res) == 1)
               {
                $r = SQL_ligne_suivante ($res) ;
		$ok = 0 ;
		$requete = "INSERT INTO messages_recepteurs (id_message,recepteur_type,recepteur_groupe,recepteur_utilisateur) VALUES " ;
		If (($messagerie == 1) Or ($messagerie == 3))
                 {
                  For ($i = 0 ; $i < $nbr_recepteur_type ; $i++)
                   {
		    $rt = var_courante ("recepteur_type_".$i, 0, null) ;
                    If ($rt)
                     {
		      If ($ok == 1) { $requete .= "," ; }
		      $requete .= "('".$r [0]."','".$rt."','".$recepteur_groupe."','".$recepteur_utilisateur."')" ;
		      $ok = 1 ;
                     }
                   }
		 }
		If (($messagerie == 2) Or ($messagerie == 3))
                 {
		  $listes_diffusion = liste_diffusion_globale_tableau () ;
		  $externe_liste [0][0] = 0 ;
                  For ($i = 0 ; $i < $listes_diffusion [0][0][0] ; $i++)
                   {
		    $id_classe = IsSet ($_POST ["liste_ep"][$i]) ? $_POST ["liste_ep"][$i] : 0 ;
		    If ($id_classe > 0)
		     {
		      For ($j = 1 ; $j <= $listes_diffusion [$i][0][2] ; $j++)
		       {
		        $externe_liste = table_adresses ($externe_liste, $listes_diffusion [$i][$j][0], $listes_diffusion [$i][$j][3]) ;
		       }
		      If ($ok == 1) { $requete .= "," ; }
		      $requete .= "('".$r [0]."','-1','".$id_classe."','0')" ;
		      $ok = 1 ;
		     }
                   }
                  $liste_prof = liste_enseignant_avec_mel () ;
		  For ($i = 0 ; $i < $liste_prof [0][0] ; $i++)
                   {
		    $id_prof = IsSet ($_POST ["liste_ens"][$i]) ? $_POST ["liste_ens"][$i] : 0 ;
		    If ($id_prof > 0)
		     {
		      $externe_liste = table_adresses ($externe_liste, $id_prof, $liste_prof [$i][3]) ;
		      If ($ok == 1) { $requete .= "," ; }
		      $requete .= "('".$r [0]."','-2','0','".$id_prof."')" ;
		      $ok = 1 ;
		     }
		   }
		  $externe [0] = $externe_liste [0][0] ;
		  For ($i = 1 ; $i <= $externe_liste [0][0] ; $i++)
                   {
		    $externe [$i] = $externe_liste [$i][0] ;
		   }
		 }
		If ($ok == 1)
		 {
		  $ok = SQL_commande ($requete, $id_sql) ;
		  If (($messagerie == 2) Or ($messagerie == 3))
                   {
		    $ajout_direction = restaure_configuration_defaut ("SYSTEME_PARAM","GENERAL","MEL_AJOUT_DIRECTION",0) ;
		    If ($ajout_direction == 1)
		     {
	              $u = SQL_commande ("SELECT id_utilisateur FROM utilisateurs WHERE droits='".$droit_direction."' AND mel!='' AND millesime='".$millesime."'", $id_sql) ;
	              $nombre = SQL_nbr_lignes ($u) ;
	              If ($nombre > 0)
	               {
	                For ($i = 1 ; $i <= $nombre ; $i++)
	                 {
	                  $dst = SQL_ligne_suivante ($u) ;
	                  $externe [0]++ ;
			  $externe [$externe [0]] = $dst [0] ;
	                 }
	               }
		     }
		    $ok = mel_envoi_en_masse ($emetteur_utilisateur, $externe, $titre, $texte, 1) ;
		   }
		 }
                $message = "Message enregistr&eacute;." ;
               }
              Else { $message = "Probl&egrave;me d'enregistrement du message." ; }
	      $action = 1 ;
	      Break ;
     // Suppression
     Case 2 : $id_message = var_courante ("id_message", 0, null) ;
              If (IsSet ($id_message) And ($id_message > 0))
               {
                $ok = SQL_commande ("DELETE FROM messages_recepteurs WHERE id_message='".$id_message."'", $id_sql) ;
                $ok = SQL_commande ("DELETE FROM messages WHERE id_message='".$id_message."' LIMIT 1", $id_sql) ;
                $message = "Suppression du message effectu&eacute;." ;
               }
	      $action = 1 ;
              Break ;
     // Debut modification
     Case 3 : $id_message = var_courante ("id_message", 0, null) ;
              If (IsSet ($id_message) And ($id_message > 0))
               {
                $res = SQL_commande ("SELECT * FROM messages WHERE id_message='".$id_message."' LIMIT 1", $id_sql) ;
                $modif = SQL_tableau_associatif ($res, "") ;
	        $action = 3 ;
               }
              Else { $action = 1 ; }
              Break ;
     // Fin modification
     Case 4 : $id_message = var_courante ("id_message", 0, null) ;
              If (IsSet ($id_message) And ($id_message > 0))
               {
                $date_debut = $annee_debut."-".$mois_debut."-".$jour_debut ;
                $date_fin = $annee_fin."-".$mois_fin."-".$jour_fin ;
                $ok = SQL_commande ("UPDATE messages SET titre='".filtrage ($titre)."',date_message='".Date ("Y-m-d")."',date_debut='".$date_debut."',
                                                         date_fin='".$date_fin."',contenu='".filtrage ($texte)."'
		  		      WHERE id_message='".$id_message."' LIMIT 1", $id_sql) ;
		$ok = SQL_commande ("DELETE FROM messages_recepteurs WHERE id_message='".$id_message."'", $id_sql) ;
		$ok = 0 ;
		$requete = "INSERT INTO messages_recepteurs (id_message,recepteur_type,recepteur_groupe,recepteur_utilisateur) VALUES " ;
		If (($messagerie == 1) Or ($messagerie == 3))
                 {
                  For ($i = 0 ; $i < $nbr_recepteur_type ; $i++)
                   {
		    $rt = var_courante ("recepteur_type_".$i, 0, null) ;
                    If ($rt)
                     {
		      If ($ok == 1) { $requete .= "," ; }
		      $requete .= "('".$id_message."','".$rt."','".$recepteur_groupe."','".$recepteur_utilisateur."')" ;
		      $ok = 1 ;
                     }
                   }
		 }
		If (($messagerie == 2) Or ($messagerie == 3))
                 {
		  $listes_diffusion = liste_diffusion_globale_tableau () ;
		  $externe_liste [0][0] = 0 ;
                  For ($i = 0 ; $i < $listes_diffusion [0][0][0] ; $i++)
                   {
		    $id_classe = IsSet ($_POST ["liste_ep"][$i]) ? $_POST ["liste_ep"][$i] : 0 ;
		    If ($id_classe > 0)
		     {
		      For ($j = 1 ; $j <= $listes_diffusion [$i][0][2] ; $j++)
		       {
		        $externe_liste = table_adresses ($externe_liste, $listes_diffusion [$i][$j][0], $listes_diffusion [$i][$j][3]) ;
		       }
		      If ($ok == 1) { $requete .= "," ; }
		      $requete .= "('".$id_message."','-1','".$id_classe."','0')" ;
		      $ok = 1 ;
		     }
                   }
                  $liste_prof = liste_enseignant_avec_mel () ;
		  For ($i = 0 ; $i < $liste_prof [0][0] ; $i++)
                   {
		    $id_prof = IsSet ($_POST ["liste_ens"][$i]) ? $_POST ["liste_ens"][$i] : 0 ;
		    If ($id_prof > 0)
		     {
		      $externe_liste = table_adresses ($externe_liste, $id_prof, $liste_prof [0][3]) ;
		      If ($ok == 1) { $requete .= "," ; }
		      $requete .= "('".$id_message."','-2','0','".$id_prof."')" ;
		      $ok = 1 ;
		     }
		   }
		  $externe [0] = $externe_liste [0][0] ;
		  For ($i = 1 ; $i <= $externe_liste [0][0] ; $i++)
                   {
		    $externe [$i] = $externe_liste [$i][0] ;
		   }
		 }
		If ($ok == 1)
		 {
		  $ok = SQL_commande ($requete, $id_sql) ;
		  If (($messagerie == 2) Or ($messagerie == 3))
                   {
		    $ajout_direction = restaure_configuration_defaut ("SYSTEME_PARAM","GENERAL","MEL_AJOUT_DIRECTION",0) ;
		    If ($ajout_direction == 1)
		     {
	              $u = SQL_commande ("SELECT id_utilisateur FROM utilisateurs WHERE droits='".$droit_direction."' AND mel!='' AND millesime='".$millesime."'", $id_sql) ;
	              $nombre = SQL_nbr_lignes ($u) ;
	              If ($nombre > 0)
	               {
	                For ($i = 1 ; $i <= $nombre ; $i++)
	                 {
	                  $dst = SQL_ligne_suivante ($u) ;
	                  $externe [0]++ ;
			  $externe [$externe [0]] = $dst [0] ;
	                 }
	               }
		     }
		    $ok = mel_envoi_en_masse ($emetteur_utilisateur, $externe, $titre, $texte, 1) ;
		   }
		 }
                $message = "Message modifi&eacute;." ;
               }
	      $action = 1 ;
              Break ;
    }
  }
 
 If ((IsSet ($action) And ($action != 3)) Or (!IsSet ($action)))
  {
   $modif ["id_message"] = 0 ;
   $modif ["titre"] = "" ;
   $modif ["date_debut"] = Date ("Y-m-d") ;
   $modif ["date_fin"] = Date ("Y-m-d") ;
   $modif ["contenu"] = "" ;
  }
 //$modif ["titre"] = filtrage_utf8 ($modif ["titre"]) ;
 //$modif ["contenu"] = filtrage_utf8 ($modif ["contenu"]) ;

 $id_utilisateur = utilparcode ($_SESSION ["code"]) ;
 $param_theme = parametres_theme (themeparsession ($_SESSION ["code"])) ;
 $rep_themes = "../../images/themes/" ;
 Include ($rep_themes.$param_theme ["nom_repertoire"]."/".$param_theme ["fichier_config"]) ;
  
 Echo "<html><head>" ;
 entete_html ("Garennes", "", 1) ;
 Echo styles ("none", "none", "none", $theme [0][32], "none") ;
 Include ("./messagerie.js") ;
 Echo "</head>" ;
 
 $resultats = SQL_commande ("SELECT * FROM gestion LIMIT 1", $id_sql) ;
 $gestion = SQL_tableau_associatif ($resultats, "") ;
 
 Echo "<body background=\"".$rep_themes.$param_theme ["nom_repertoire"]."/".$theme [9][10]."\" onContextMenu=\"return false\">" ;
 Echo "<center>Messagerie</center>" ;
 If (IsSet ($message)) { Echo "<center><font color=\"#ff0000\"><b>".$message."</b></font></center>" ; }
 // Liste des messages personnels
 $titre_fenetre = "Vos messages..." ;
 $resultats = SQL_commande ("SELECT id_message,titre,date_message,date_debut,date_fin FROM messages
                              WHERE emetteur_type='".$droit_courant."' AND emetteur_utilisateur='".$id_utilisateur."' ORDER BY date_message DESC,contenu ASC", $id_sql) ;
 If (SQL_nbr_lignes ($resultats) > 0)
  {
   Echo "<FORM ACTION=\"./messagerie.php\" MTHOD=\"POST\" NAME=\"suppression\">" ;
   Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"id_message\" VALUE=\"0\">" ;
   Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"action\" VALUE=\"2\">" ;
   Echo "</FORM>" ;
   Echo "<TABLE BORDER=\"0\" ALIGN=\"CENTER\" CELLSPACING=\"0\" CELLPADDING=\"0\" STYLE=\"border-collapase:collapse\">" ;
   Echo "<TR><TD VALIGN=\"TOP\">" ;
   Include ("../include/debut_theme.inc") ;
   Echo "<TABLE BORDER=\"0\" CELLSPACING=\"0\" CELLPADDING=\"0\" WIDTH=\"100%\">" ;
   Echo "<tr><td colspan=\"2\" valign=\"middle\"><a href=\"./messagerie.php\">&nbsp;Nouveau&nbsp;message&nbsp;</a></td></tr>" ;
   For ($i = 0 ; $i < SQL_nbr_lignes ($resultats) ; $i++)
    {
     $ligne = SQL_ligne_suivante ($resultats) ;
     Echo "<TR" ;
     If ($i%$theme [10][0] == 1) { Echo " BGCOLOR=\"".$theme [10][2]."\"" ; }
     Echo "><TD VALIGN=\"MIDDLE\"><A HREF=\"./messagerie.php?action=3&id_message=".$ligne [0]."\"><IMG SRC=\"../images/edition.png\" BORDER=\"0\" TITLE=\"Modifier...\"></A>" ;
     Echo "<A HREF=\"javascript:valider_effacement('".Str_Replace ("'", "\'", $ligne [1])."','".decode_date_3 ($ligne [2])."','".decode_date_3 ($ligne [3])."','".decode_date_3 ($ligne [4])."','".$ligne [0]."')\">" ;
     Echo "<IMG SRC=\"../images/effacer.png\" BORDER=\"0\" TITLE=\"Supprimer...\"></A>&nbsp;</TD>" ;
     Echo "<TD><FONT SIZE=\"-2\"><B>&nbsp;".Str_Replace (" ", "&nbsp;", $ligne [1])."&nbsp;</B></FONT>" ;
     Echo "<BR><FONT SIZE=\"-3\">&nbsp;Affich&eacute;&nbsp;du&nbsp;".decode_date_4 ($ligne [3])."&nbsp;au&nbsp;".decode_date_4 ($ligne [4])."&nbsp;</FONT>" ;
     $rs = SQL_commande ("SELECT g.nom FROM type_groupe_utilisateurs g,messages_recepteurs r WHERE r.id_message='".$ligne [0]."' AND r.recepteur_type=g.id_type_groupe_utilisateur ORDER BY g.nom", $id_sql) ;
     If (SQL_nbr_lignes ($rs) > 0)
      {
       Echo "<BR><FONT SIZE=\"-3\">&nbsp;Destinataire" ; If (SQL_nbr_lignes ($rs) > 0) { Echo "s" ; }
       Echo "&nbsp;:&nbsp;<I>" ;
       For ($j = 0 ; $j < SQL_nbr_lignes ($rs) ; $j++)
        {
	 $l = SQL_ligne_suivante ($rs) ;
	 Echo $l [0] ;
	 If ($j < SQL_nbr_lignes ($rs)-1) { Echo "," ; }
	 Echo "&nbsp;" ;
	}
       Echo "</I></FONT>" ;
      }
     Echo "</TD></TR>" ;
    }
   Echo "</TABLE>" ;
   Include ("../include/fin_theme.inc") ;
  }
 Else
  {
   Echo "<TABLE BORDER=\"0\" ALIGN=\"CENTER\" CELLSPACING=\"0\" CELLPADDING=\"0\" STYLE=\"border-collapase:collapse\">" ;
   Echo "<TR><TD VALIGN=\"TOP\">" ;
   Include ("../include/debut_theme.inc") ;
   Echo "<TABLE BORDER=\"0\" CELLSPACING=\"0\" CELLPADDING=\"0\" WIDTH=\"100%\"><TR><TD>Aucun&nbsp;message.</TD></TR></TABLE>" ;
   Include ("../include/fin_theme.inc") ;
  }
 Echo "</TD>" ;
 
 Echo "<TD>&nbsp;</TD>" ;
 
 Echo "<TD VALIGN=\"TOP\">" ;
 // Fenetre de composition/modification
 $fontes = "<FONT SIZE=\"".$theme [0][28]."\">" ;
 If ($modif ["id_message"] == 0) { $titre_fenetre = "Composition..." ; } Else { $titre_fenetre = "Modification d'un message..." ; }
 $non_centrer = 0 ;
 Echo "<FORM ACTION=\"./messagerie.php\" METHOD=\"POST\" NAME=\"messagerie\" onSubmit=\"return valide_saisie()\">" ;
 Include ("../include/debut_theme.inc") ;
 Echo "<TABLE BORDER=\"0\" CELLSPACING=\"0\" CELLPADDING=\"0\" WIDTH=\"100%\">" ;
 Echo "<TR><TD COLSPAN=\"3\" HEIGHT=\"10\"></TD></TR>" ;
 Echo "<TR><TD ALIGN=\"RIGHT\" VALIGN=\"TOP\">".$fontes."Sujet&nbsp;:&nbsp;</FONT></TD>" ;
 Echo "<TD COLSPAN=\"2\">".$fontes."<INPUT TYPE=\"TEXT\" NAME=\"titre\" VALUE=\"".$modif ["titre"]."\" MAXLENGTH=\"49\" SIZE=\"50\">&nbsp;</FONT></TD></TR>" ;
 Echo "<TR><TD COLSPAN=\"3\" HEIGHT=\"10\"></TD></TR>" ;
 $dd = Explode ("-", $modif ["date_debut"]) ;
 $jour_courant = $dd [2] ;
 $mois_courant = $dd [1] ;
 $annee_courant = $dd [0] ;
 Echo "<TR><TD ALIGN=\"RIGHT\" VALIGN=\"TOP\">".$fontes."Affich&eacute;&nbsp;du&nbsp;</FONT></TD><TD COLSPAN=\"2\">".saisie_date ($jour_courant,$mois_courant,$annee_courant,Date ("Y")-1,3,"jour_debut","mois_debut","annee_debut")."&nbsp;</FONT></TD></TR>" ;
 $dd = Explode ("-", $modif ["date_fin"]) ;
 $jour_courant = $dd [2] ;
 $mois_courant = $dd [1] ;
 $annee_courant = $dd [0] ;
 Echo "<TR><TD ALIGN=\"RIGHT\" VALIGN=\"TOP\">".$fontes."au&nbsp;</FONT></TD><TD COLSPAN=\"2\">".saisie_date ($jour_courant,$mois_courant,$annee_courant,Date ("Y")-1,3,"jour_fin","mois_fin","annee_fin")."&nbsp;</FONT></TD></TR>" ;
 Echo "<TR><TD COLSPAN=\"3\" HEIGHT=\"10\"></TD></TR>" ;
 Echo "<tr><td colspan=\"3\" align=\"center\">&nbsp;Destinataire(s)&nbsp;:&nbsp;</td></tr>" ;
 If (($messagerie == 1) Or ($messagerie == 3))
  {
   Echo "<tr><td align=\"right\" valign=\"top\">".$fontes."Interne&nbsp;:&nbsp;</font></td>" ;
   $res = SQL_commande ("SELECT id_type_groupe_utilisateur,nom,defaut FROM type_groupe_utilisateurs WHERE actif='1' ORDER BY nom", $id_sql) ;
   Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"nbr_recepteur_type\" VALUE=\"".SQL_nbr_lignes ($res)."\">" ;
   For ($i = 0 ; $i < SQL_nbr_lignes ($res) ; $i++)
    {
     $r = SQL_ligne_suivante ($res) ;
     If (($i%2 == 0) And ($i > 1)) { Echo "</tr><tr><td></td>" ; }
     Echo "<td>".$fontes."<INPUT TYPE=\"CHECKBOX\" NAME=\"recepteur_type_".$i."\" VALUE=\"".$r [0]."\"" ;
     If ($modif ["id_message"] != 0)
      {
       $recepteur = SQL_commande ("SELECT id_message_recepteur FROM messages_recepteurs WHERE id_message='".$modif ["id_message"]."' AND recepteur_type='".$r [0]."' LIMIT 1", $id_sql) ;
       If (SQL_nbr_lignes ($recepteur) == 1) { Echo " CHECKED" ; $rcp = SQL_ligne_suivante ($recepteur) ; } Else { $rcp [0] = 0 ; }
       Echo ">".$r [1]."&nbsp;<INPUT TYPE=\"HIDDEN\" NAME=\"id_message_recepteur_".$i."\" VALUE=\"".$rcp [0]."\"></FONT></TD>" ;
      }
     Else
      {
       If ($r [2] == 1) { Echo " checked" ; }
       Echo ">".$r [1]."&nbsp;<input type=\"hidden\" name=\"id_message_recepteur_".$i."\" value=\"0\"></font></td>" ;
      }
    }
   Echo "</tr>" ;
  }
 If (($messagerie == 2) Or ($messagerie == 3))
  {
   Echo "<tr><td align=\"right\" valign=\"top\">".$fontes."Externe&nbsp;:&nbsp;</font></td>" ;
   $listes_diffusion = liste_diffusion_globale_tableau () ;
   If ($listes_diffusion [0][0][0] > 1) { $plus = "s" ; } Else { $plus = "" ; }
   Echo "<td>&nbsp;&Eacute;quipe".$plus."&nbsp;p&eacute;dagogique".$plus."&nbsp;:<br>".$fontes."<select name=\"liste_ep[]\" size=\"5\" multiple>" ;
   For ($i = 1 ; $i <= $listes_diffusion [0][0][0] ; $i++)
    {
     Echo "<option value=\"".$listes_diffusion [$i][0][0]."\"" ;
     If ($modif ["id_message"] != 0)
      {
       $recepteur = SQL_commande ("SELECT id_message_recepteur FROM messages_recepteurs WHERE id_message='".$modif ["id_message"]."' AND recepteur_type='-1' AND recepteur_groupe='".$listes_diffusion [$i][0][0]."' LIMIT 1", $id_sql) ;
       If (SQL_nbr_lignes ($recepteur) == 1) { Echo " selected" ; }
      }
     Echo ">".$listes_diffusion [$i][0][1]."</option>" ;
    }
   Echo "</select></td>" ;
   $liste_prof = liste_enseignant_avec_mel () ;
   If ($liste_prof [0][0] > 0)
    {
    If ($liste_prof [0][0] > 1) { $plus = "s" ; } Else { $plus = "" ; }
     Echo "<td>&nbsp;Enseignant".$plus."&nbsp;:<br>".$fontes."<select name=\"liste_ens[]\" size=\"5\" multiple>" ;
     For ($i = 1 ; $i <= $liste_prof [0][0] ; $i++)
      {
       Echo "<option value=\"".$liste_prof [$i][0]."\"" ;
       If ($modif ["id_message"] != 0)
        {
         $recepteur = SQL_commande ("SELECT id_message_recepteur FROM messages_recepteurs WHERE id_message='".$modif ["id_message"]."' AND recepteur_type='-2' AND recepteur_utilisateur='".$liste_prof [$i][0]."' LIMIT 1", $id_sql) ;
         If (SQL_nbr_lignes ($recepteur) == 1) { Echo " selected" ; }
        }
       Echo ">".$liste_prof [$i][1]." ".$liste_prof [$i][2]."</option>" ;
      }
     Echo "</select></td>" ;
    }
   Echo "</tr>" ;
  } 
 Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"recepteur_groupe\" VALUE=\"0\">" ;
 Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"recepteur_utilisateur\" VALUE=\"0\">" ;
 Echo "<TR><TD COLSPAN=\"3\" VALIGN=\"TOP\" WIDTH=\"100%\">" ;
 Echo active_editeur ("200","100%","Simple",$param_theme ["nom_repertoire"],$modif ["contenu"]) ;
 Echo "</TD></TR>" ;
 Echo "<TR><TD COLSPAN=\"3\" ALIGN=\"CENTER\"><INPUT TYPE=\"IMAGE\" SRC=\"" ;
 If ($droit_courant != $droit_prof) { Echo "../images/valider.png" ; }
 Else { Echo $rep_themes.$param_theme ["nom_repertoire"]."/".$theme [9][0] ; }
 Echo "\" NAME=\"submit\" VALUE=\" Valider le message \" BORDER=\"0\"></TD></TR></TABLE>" ;
 Include ("../include/fin_theme.inc") ;
 Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"emetteur_type\" VALUE=\"".$droit_courant."\">" ;
 Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"emetteur_utilisateur\" VALUE=\"".$id_utilisateur."\">" ;
 Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"id_message\" VALUE=\"".$modif ["id_message"]."\">" ;
 Echo "<INPUT TYPE=\"HIDDEN\" NAME=\"action\" VALUE=\"" ;
 If ($modif ["id_message"] == 0) { Echo "1" ; } Else { Echo "4" ; }
 Echo "\">" ;
 Echo "</FORM>" ;
 Echo "</TD></TR><TABLE>" ;
 Echo "</BODY><HTML>" ;
?>